Imports Microsoft.VisualBasic

Namespace My
    Public Class MySqlDataSourceView
        Inherits SqlDataSourceView

        Public Sub New(ByVal owner As SqlDataSource, ByVal name As String, ByVal context As HttpContext)
            MyBase.New(owner, name, context)
        End Sub

        Protected Overrides Function ExecuteSelect(ByVal arguments As System.Web.UI.DataSourceSelectArguments) As System.Collections.IEnumerable
            RaiseEvent PreSelecting(Me, New EventArgs)
            Return MyBase.ExecuteSelect(arguments)
        End Function

        Public Event PreSelecting(ByVal sender As Object, ByVal e As EventArgs)

    End Class
End Namespace
